perm filename DUMMY.LAP[3,LMM] blob sn#037491 filedate 1973-04-22 generic text, type T, neo UTF8
(DECIMAL) 

(LAP DUMMY SUBR) 
       (MOVEI 1. (QUOTE NIL)) 
       (POPJ P) 
       NIL 

(DECIMAL) 

(PRINT (LIST (ADD1 7.) (QUOTE =) 1. 0.))